;Start of program
	XPROG
	400
		;BLOCK
	XMVAR
		;Events
	4
	1
	0
		;BLOCK
	XMVAR
		;Arrays
		;SC
	1001
	1
	100100
	100001
	0
		;BLOCK
	XMVAR
		;Arrays
		;VT
	1002
	1
	100100
	100001
	0
		;BLOCK
	XMVAR
		;Arrays
		;TR
	1003
	1
	100100
	100001
	0
		;BLOCK
	XMVAR
		;Scalars
	1
	1
	0
		;FOR LOOP
	XPUSH
	L1
	XPUSH
	L2
	XPUSH
	L1
L3:	XCOPY
	2
	XCHNGE
		;I
	404
	XFORCHK
	L4
		;Assignment
	XPUSH
	L5
		;Array reference
	XGTVAL
		;I
	404
	XCHNGE
		;SC
	401
	XCOPY
	0
	XCOPY
	3
	XSADD
	XREPLACE
	3
	XJUMP
	L3
L4:	XPOP
	XPOP
	XPOP
		;END FOR
		;FOR LOOP
	XPUSH
	L1
	XPUSH
	L2
	XPUSH
	L1
L6:	XCOPY
	2
	XCHNGE
		;I
	404
	XFORCHK
	L7
		;Assignment
	XPUSH
	L10
		;Array reference
	XGTVAL
		;I
	404
	XCHNGE
		;VT
	402
	XCOPY
	0
	XCOPY
	3
	XSADD
	XREPLACE
	3
	XJUMP
	L6
L7:	XPOP
	XPOP
	XPOP
		;END FOR
		;FOR LOOP
	XPUSH
	L1
	XPUSH
	L2
	XPUSH
	L1
L11:	XCOPY
	2
	XCHNGE
		;I
	404
	XFORCHK
	L12
		;Assignment
	XPUSH
	L13
		;Array reference
	XGTVAL
		;I
	404
	XCHNGE
		;TR
	403
	XCOPY
	0
	XCOPY
	3
	XSADD
	XREPLACE
	3
	XJUMP
	L11
L12:	XPOP
	XPOP
	XPOP
		;END FOR
		;Print
	XPRINT
	L14
		;Event operation
	XWAITE
		;EV
	400
		;BLOCK
	XMVAR
		;Scalars
	1
	144
	0
		;BLOCK
	XMVAR
		;Scalars
	1
	144
	0
		;BLOCK
	XMVAR
		;Scalars
	1
	63
	0
		;Block end cleanup
	XKVAR
	63
		;End of BLOCK
		;Block end cleanup
	XKVAR
	144
		;End of BLOCK
		;Block end cleanup
	XKVAR
	144
		;End of BLOCK
		;Block end cleanup
	XKVAR
	1
		;End of BLOCK
		;Block end cleanup
	XKVAR
	1
		;End of BLOCK
		;Block end cleanup
	XKVAR
	1
		;End of BLOCK
		;Block end cleanup
	XKVAR
	1
		;End of BLOCK
		;Block end cleanup
	XKVAR
	1
		;End of BLOCK
	XENDP
		;End of program